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# Apple Lisa Computer: Hardware Unit Disassembly 



Lisa Hardware Interface & Implementation 

Apple Lisa Hardware Unit 



UNIT HtfINT; INTRINSIC- 



TYPE 
Ascii 
Pixels 
ManyPixels 
CursorHeight 
CursorPtr 
LogicalAddress 
DateArray 



Frames 

Seconds 

Milliseconds 

Microseconds 

AlarnWumber 

SpeakerVolume 

ScreenContrast 

VisibleScrn 

KeybdQIndex 

Keybdid 

KeyCap 

KeyCapSet 

KeyEvent 



INTERFACE 
(in Lisa Pascal) 



Char; 

Integer; 

Longint; 

Integer; 

'Integer; 

Longint; 

RECORD 

year : Integer; 

day : Integer; 

hour : Integer; 

minute : Integer; 

second : Integer; 
END; 

Longint; 
Longint; 
Longint; 
Longint; 
Integer; 
Integer; 
Integer; 

(PriScrn, AltScrn); 
1..1000; 
Integer; 
D. . 127; 

SET OF Keycap; 
PACKED RECORD 



key 

ascii 
state 
mouseX 
mouseY 
time 
END; 



KeyCap; 

Char; 

Integer; 

Pixels; 

Pixels; 

Milliseconds; 



PROCEDURE Driverlnit; 

PROCEDURE DiskDriver (routine: LogicalAddress); 
PROCEDURE TwiggyDriver (routine: LogicalAddress); 
PROCEDURE DiskSync(busy: Boolean); 






(i?f^^^ 



) 
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PROCEDURE NMISync; 

PROCEDURE COPSSync; 

PROCEDURE Poll; 

PROCEDURE HouseLocation(VAR x: Pixels; VAR y: Pixels); 

PROCEDURE tlouseUpdates (delay: Milliseconds); 

PROCEDURE MouseScaling(scale: Boolean); 

PROCEDURE MouseThresh(threshold: Pixels); 

FUNCTION MouseOdometer: ManyPixels; 

PROCEDURE CursorLocation(x: Pixels; y: Pixels); 

PROCEDURE CursorTracking(track: Boolean); 

PROCEDURE CursorImage(hotX: Pixels; hotV: Pixels; height: CursorHeight; 

data: CursorPtr; mask: CursorPtr); 

PROCEDURE CursorHide; 

PROCEDURE CursorShield(left: Pixels; top: Pixels; right:' Pixels; 

bottom: Pixels); 

PROCEDURE CursorDisplay; 

PROCEDURE CursorObscure; 

PROCEDURE Cursorlnit; 

PROCEDURE CursorRelnit; 

PFWCEDURE Busy Image (hotX: Pixels; hotY: Pixels; height: CursorHeight; ' 
data: CursorPtr; mask: CursorPtr); 

PROCEDURE BusyDelay (delay: Milliseconds); 

FUNCTION FrameCounter: Frames; 

PROCEDURE ScreenSi2e(VAR x: Pixels; VAR y: Pixels); 

FUNCTION ScreenAddr: LogicalAddress; 

FUNCTION AltScreenAddr: LogicalAddress; 

FUNCTION ScreenKeybd: VisibleScreen; 

PROCEDURE SetScreenKeybd (screen: VisibleScreen); 
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Lisa Hardware Interface & fmp/ementat/on 


FUNCTION Contrast: ScreenContrast; 


PROCEDURE SetContrast (contrast: ScreenContrast); 


PROCEDURE RampContrast(contrast: ScreenContrast); 


FUNCTION DimContrast: ScreenContrast; 


PROCEDURE SetDitnContrast(contrast: ScreenContrast); 


FUNCTION FadeDelay: Milliseconds; 


PROCEDURE SetFadeDelay(delay: HilliSeconds); 


PROCEDURE PowerDown; 


PROCEDURE PowerCycle (delay: Seconds); 


FUNCTION Volume: SpeakerWolume; 


PROCEDURE SetVGlume(volume: SpeakerVolume); 


PROCEDURE Noise (wavelength: Microseconds); 


PROCEDURE Silence; 


PROCEDURE Beep(waveLength: Microseconds; duration: Milliseconds); 


FUNCTION Keyboard: Keybdid; 


FUNCTION Legends: Keybdid; 


PRXEDURE SetLegends(id: Keybdid); 


FUNCTION KeyIsDottn(key: KeyCap): Boolean; 


PROCEDURE KeyMap(VAR keys: KeyCapSet); 


FUNCTION KeybdPeek (repeats: Boolean; index: KeybdQIndex; 
UAR event: KeyEvent): Boolean; 


FUNCTION AltJ<eyPeek(repeats: Boolean; index: KeybdQIndex; 

VAR event: KeyEvent): Boolean; 


FUNCTION KeybdEvent(repeats: Boolean; wait: Boolean; 

VAR event: KeyEvent): Boolean; 


FUNCTION AltKeyE vent (repeats: Boolean; wait: Boolean; 

VAR event: KeyEvent): Boolean; 


PROCEDURE RepeatRate(VAR initial: Milliseconds; 

VAR subsequent: Milliseconds); 
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PROCEDURE SetRepeatRate(initial: Milliseconds; subsequent: Milliseconds); 

PROCEDURE KeyPushed(key: KeyCap); 

FUNCTION NMIKey: KeyCap; 

PROCEDURE SetNMIKey(key: KeyCap); 

FUNCTION ToggleKey: KeyCap; 

PROCEDURE SetToggleKey(key: KeyCap); 

FUNCTION KeyToAscii(key: KeyCap; State: Integer): Ascii; 

FUNCTION MicroTimer: Microseconds; 

FUNCTION Timer: Milliseconds; 

PROCEDURE AlarmAssign(VAR alarm: AlarmNumber; routine: LogicalAddress); 

PROCEDURE AlarmReturn( alarm: AlarmNumber); 

PROCEDURE AlarmAbsolute( alarm: AlarmNumber; time: Milliseconds); 

PROCEDURE AlarmRelative(alarm: AlarmNumber; delay: Milliseconds); 

PROCEDURE AlarmOff (alarm: AlarmNumber); 

PROCEDURE DateTime(WAR date: DateArray); 

PROCEDURE SetDateTime(date: DateArray); 

PROCEDURE DateToTime(date: DateArray; VAR time: Seconds); 

FUNCTION TimeStamp: Seconds; 

PROCEDURE SetTimeStamp(time: Seconds); 

PROCEDlffE TimeToDate(time: Seconds; VAR date: DateArray); 
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IMPLEMENTATION 






(in 680DD assembly language) 


000000: 


4E56 0000 


HWINTL 


LINK 


A6, nOOOO 


000004: 
OOOOOfl: 
000010: 
000016: 
00001C: 
000022: 


436F 7079 7269 
6758 7420 3139 
3833 2C20 4170 
706C 6520 435F 
6D70 7574 6572 
2049 6E63 2E20 




'Copyright 1983, Apple Computer Inc. ' 


000028: 
00002A: 
00002C: 
00002E: 
000030: 


2F07 
4247 
4E45 
2E1F 
4E75 


DRIVERIN 


MOyE.L 
CLR.W 
TRAP 
tiOyE. L 
RTS 


D7,-(A7) 
D7 
»$5 
(A7)+,D7 


000032: 
000036: 
000038: 
00003C: 
00003E: 
000040: 
000042: 
000044: 


206F 0004 

2F07 

3E3C 0068 

4E45 

2E1F 

20SF 

584F 

4ED0 


DISKDRIV 


MOVE. L 
MOWE. L 
MOVE. W 
TRAP 
MOVE. L 
MOVE. L 
ADDQ. W 
JMP 


$0004(A7XA0 

D7,-(A7) 

^^0058, D7 

#$5 

(A7)+,D7 

(A7)+,A0 

»$4,A7 

(AO) 


000046: 
00004A: 
00004C: 
000050: 
000052: 
000054: 
000056: 
000058: 


205F 0004 

2F07 

3E3C 006A 

4E45 

2E1F 

205F 

584F 

4ED0 


TWIGGYDR 


MOVE.L 

MOVE.L 

MOVE.W 

TRAP 

MOVE.L 

MOVE.L 

ADDQ.W 

JMP 


$0004(A7), AO 
07, -(A7) 
#$006A, D7 
#$5 

(A7)+,D7 
(A7)+,A0 
#$4,A7 
(AO) 


OOOOSfl: 
00005C: 
00005E: 
000060: 
000064: 
000066: 
000058: 


205F 

101F 

2F07 

3E3C 006C 

4E45 

2E1F 

4ED0 


DISKSYNC 


MOVE.L 

MOVE.B 

MOVE.L 

MOVE.W 

TRAP 

MOVE. L 

JMP 


(A7)+, AO 

(A7)+,D0 

07, -(A7) 

#$006C, D7 

#$5 

(A7)*,D7 

(AO) 


00D06A: 
00006C: 
000070: 
000072: 
000074: 


2F07 

3E3C OOBC 
4E45 
2E1F 
4E75 


NHISYNC 


MOVE.L 

MOVE.W 

TRAP 

MGVE.L 

RTS 
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07, -(A7) 
#$008C,D7 
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000076: 


IV^l 


COPSSYNC 


MOVE. L 


D7, -(A7) 


000078: 


3E3C OOAA 




MOyE.W 


**$OOAA. D7 


00007C: 


4E45 




TRAP 


#$5 


00007E: 


2E1F 




MOyE.L 


(A7)+,D7 


000080: 


4E75 




RTS 




000082: 


2F07 


POLL 


HOVE.L 


D7, -(A7) 


000084: 


3E3C 009E 




MOVE.W 


nOOQE, 07 


000088: 


4E45 




TRAP 


f^ 


00008A: 


2E1F 




MOVE.L 


(A7)+,D7 


00008C: 


4E75 




RTS 




00008E: 


2F07 


HOUSELOC 


HOVE.L 


D7, -(A7) 


000090: 


3E3C 0002 




MOVE. lU 


<*$0002, D7 


000094: 


4E45 




TRAP 


#$5 


000096: 


2E1F 




MOVE. L 


(A7)+,D7 


000098: 


4CDF 0300 




MOVEM.L 


(A7)+,A0/A1 


00009C: 


3281 




MOVE.W 


01, (A1) 


00009E: 


225F 




MOVE. L 


(A7)+,A1 


OOOOAO: 


3280 




MOVE. lU 


DO, (A1) 


0000A2: 


4ED0 




JMP 


(AO) 


0000A4: 


205F 


HOUSEUPD 


MOVE. L 


(A7)+,A0 


0000A6: 


201F 




MOVE.L 


(A7)+,D0 


00O0A8: 


2F07 




MOVE.L 


D7,-(A7) 


OOOOAA: 


3E3C 0004 




rtflVE.W 


^^0004, D7 


OOOOAE: 


4E45 




TRAP 


#$5 


OOOOBO: 


2E1F 




MOVE.L 


(A7)+,D7 


0000B2: 


4ED0 




JMP 


(AO) 


0000B4: 


205F 


MOUSESCA 


MOVE.L 


(A7)+,A0 


000086: 


101F 




MOVE.B 


(A7)+, DO 


0000B8: 


2F07 




MOVE.L 


D7, -<A7) 


OOOOBA: 


3E3C 0006 




MOVE.W 


#$0006, D7 


OOOOBE: 


4E45 




TRAP 


#$5 


OOOOCO: 


2E1F 




MOVE.L 


(A7)+,D7 


0000C2: 


4ED0 




JMP 


(AO) 


0O0OC4: 


205F 


MOUSETHR 


MOVE.L 


(A7)+,A0 


0OOOC6: 


301F 




MOVE.W 


(A7)+,D0 


OO0OC8: 


2F07 




MOVE.L 


D7,-(A7) 


OOOOCA: 


3E3C 0008 




MOVE. W 


«$0008,D7 


OOOOCE: 


4E45 




TRAP 


#*5 


OOOODO: 


2E1F 




MOVE.L 


(A7)+,D7 


000002: 


4ED0 




JMP 


(AO) 


0000D4: 


2F07 


MOUSEODO 


MOVE.L 


D7, -(A7) 


0000D6: 


3E3C 0OA8 




MOVE.W 


#$00A8,D7 


OOOODA: 


4E45 




TRAP 


#$5 


OOOODC: 


2E1F 




MOVE.L 


(A7)+.D7 


OOOODE: 


2F40 0004 




MOVE.L 


D0,$0004(A7) 


0000E2: 


4E75 




RTS 
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0000E4 


4CDF 0100 




CURSORLO 


MOVEM. L 


(A7)+,A0 


0000E8 


321F 






MOVE. HI 


(A7)+,D1 


OOOOEA 


301 F 






MOVE. W 


(A7)+,D0 


OOOOEC 


2F07 






MOVE.L 


D7, -(A7) 


OOOOEE 


3E3C OOOA 






MOVE. « 


#$000A,D7 


0000F2 


4E45 






TRAP 


#$5 


0000F4 


2E1F 






MOVE.L 


(A7)+,D7 


0000F6 


4ED0 






JMP 


(AO) 


0000F8 


205F 




CURSORTR 


MOVE.L 


(A7)+, AO 


OOOOFA 


101F 






MOVE. B 


(A7)+,D0 


OOOCFC 


2F07 






MOVE.L 


D7, -(A7) 


OOOOFE 


3E3C OOOC 






MOVE. W 


#$0000, D7 


000102 


4E45 






TRAP 


^t$5 


000104 


2E1F 






HOVE. L 


(A7)+,D7 


000105 


4ED0 






JMP 


(AO) 


000108 


302F 0010 




CURSQRIM 


MOVE, til 


$0010(A7),D0 


0001 OC 


322F OOOE 






MOVE. W 


$0OOE(A7),D1 


000110 


342F OOOC 






HOVE, tl) 


$000C(A7).D2 


000114 


206F 0008 






HOVE. L 


$0008 (A7X AO 


000118 


226F 0004 






HOVE. L 


$0004 (A7). A1 


0001 1C 


48E7 2030 






HOVEM.L 


D2/A2/A3, -(A7) 


000120 


247C OOFA 


0000 




HOVE.L 


«$OOFAO0O0, A2 


000126 


: 267C OOFA 0040 




MOVE.L 


#$00FA0040, A3 


00012C 


: 5342 






SI IRQ. W 


#$1,D2 


00012E 


: 34D8 






MOVE. Ill 


(A0)+, (A2) + 


000130 


: 36D9 






HOVE. Ill 


(A1)+,(A3)+ 


000132 


: 51CA FFFA 






DBF 


D2,*-$0004 ; 000001 2E 


000136 


: 207C OOFA 


0000 




MOVE.L 


«$00FA0000, AO 


00013C 


: 227C OOFA 


0040 




MOVE.L 


#$OOFA0040, A1 


000142 


: 4CDF 0C04 






MOVEM. L 


(A7)+,D2/A2/A3 


000146 


: 2F07 






MOVE. L 


D7, -(A7) 


000148 


: 3EX OOOE 






MOVE.W 


#$0OOE,D7 


00014C 


: 4E45 






TRAP 


#$5 


0001 4E 


: 2E1F 






MOVE.L 


(A7)+,D7 


000150 


: 205F 






MOVE. L 


(A7)+,A0 


000152 


: DEFC OOOE 






ADDA. Ill 


#$000E,A7 


000156 


: 4ED0 






JMP 


(AO) 


000158 


: 2F07 




CURSORHI 


MOVE. L 


D7, -(A7) 


00015A 


: 3E3C 0010 






MOVE. W 


«$0010,D7 


0001 5E 


: 4E45 






TRAP 


#$5 


000150 


: 2E1F 






MOVE.L 


(A7)+,D7 


000162 


: 4E75 






RTS 




000164 


: 2F03 




CURSORSH 


HOVE. L 


D3, -(A7) 


000166 


: 362F 0008 






MOVE.W 


$0008(A7),D3 


00016A 


: 342F OOOA 






MOVE.W 


$000A(A7),D2 


00016E 


: 322F OOOC 






MOVE.W 


$000C(A7),D1 


000172 


: 302F OOOE 






HOVE. W 


$000E(A7),D0 


000176 


: 2FG7 






HOVE.L 
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000178: 


3E3C 


0012 






HOVE.W 


#$0012, D7 


00017C: 


4E45 








TRAP 


#$5 


00017E: 


2E1F 








MOVE.L 


(A7)+,D7 


000180: 


261F 








MOVE.L 


(A7)+,D3 


000182: 


205F 








MOVE.L 


(A7)+,A0 


000184: 


504F 








ADDQ.W 


#$8,A7 


000186: 


4ED0 








JMP 


(AO) 


000188: 


2F07 






CURSORDI 


MOVE.L 


07, -(A7) 


0001 8A: 


3E3C 


0014 






MOVE.W 


#$0014, D7 


0001 8E: 


4E45 








TRAP 


#$5 


000190: 


2E1F 








MOVE.L 


(A7)+,D7 


000192: 


4E75 








RTS 




000194: 


2F07 






CURSOROB 


MOVE.L 


D7, -(A7) 


000196: 


3E3C 


006E 






MOVE. W 


*f$006E,D7 


00019A: 


4E45 








TRAP 


#$5 


00019C: 


2E1F 








MOVE.L 


(A7)+,D7 


00019E: 


4E75 








RTS 




0001A0: 


2F07 






CURSORIN 


MOVE.L 


D7, -(A7) 


0001A2: 


3E3C 


0070 






MOVE. W 


#$0070,07 


0001 A6- 


4E45 








TRAP 


#$5 


0001 A8. 


2E1F 








MOVE. L 


(A7)+,D7 


0001 AA 


4E75 








RTS 




0001 AC 


2F07 






CURSORRE 


MOVE. L 


07, -(A7) 


0001AE 


SEX 009C 






MOVE. 8) 


#$009C,D7 


000 1B2 


4E45 








TRAP 


#$5 


000 1B4 


2E1F 








MOVE.L 


(A7)+,D7 


000 1B6 


4E75 








RTS 




000 1B8 


302F 


0010 




BUSYIMAG 


MOVE. W 


$0010(A7),D0 


0001BC 


322F 


OOOE 






MOVE.W 


$000E(A7),D1 


0001 CO 


342F 


OOOC 






MOVE.W 


$000C(A7),D2 


0001 C4 


206F 


0008 






MOVE.L 


$0008(A7),A0 


0001 C8 


226F 


0004 






MOVE.L 


$0004(A7), A1 


0001 CC 


48E7 2030 






MOVEM. L 


D2/A2/A3,-(A7) 


0001 DO 


247C OOFA 0000 




MOVE.L 


#$00FA0O00, A2 


0001 05 


267C 


OOFA 


0040 




r«)VE.L 


#$00FA0040, A3 


0001 DC 


5342 








SI IRQ. W 


W,D2 


0001 DE 


3408 








MOVE.W 


(A0)+, (A2) + 


0001EO 


r^fing 








MOVE.W 


(A1)+,(A3) + 


0001E2 


51CA FFFA 






DBF 


D2,*-$0004 ; 000001 DE 


0001E6 


207C 


OOFA 0000 




MOVE. L 


#$OOFAOOOO, AO 


0001EC 


227C 


OOFA 


0040 




MOVE.L 


#$00FA0040,A1 


0001F2 


4CDF 


0C04 






MOVEM. L 


(A7)+, D2/A2/A3 


0001F6 


2F07 








MOVE.L 


07, -(A7) 


0001F8 


3E3C 0086 






MOVE.W 


n0086, 07 


0001FC 


4E45 








TRAP 


#$5 


0001FE 


2E1F 








MOVE.L 


(A7)+,D7 


000200 


205F 








MOVE.L 


(A7)+,A0 


000202 


DEFC 


OOOE 






ADDA. W 
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000205: 


4ED0 






JMP 


(AO) 


000208: 


205F 




BUSYDELA 


MOVE.L 


(A7)+.A0 


00020A: 


201F 






MOVE.L 


(A7)+,D0 


00020C: 


2F07 






MOVE.L 


D7, -(A7) 


00020E: 


3E3C 


0088 




hOVE. W 


#$0088, D7 


000212: 


4E45 






TRAP 


#$5 


000214: 


2E1F 






MOVE.L 


(A7)+.D7 


000216: 


4ED0 






JMP 


(AO) 


000218: 


2F07 




FRAMECOU 


MOVE.L 


D7,-(A7) 


00021 A: 


3E3C 0016 




MOVE.H) 


#$0016, D7 


00021E: 


4E45 






TRAP 


*«ts 


000220: 


2E1F 






MOVE.L 


(A7)+,D7 


000222: 


2F40 


0004 




MOVE. L 


DO, $0004(A7) 


000226: 


4E75 






RTS 




000228: 


2F07 




SCREENSI 


MOVE.L 


D7, -(A7) 


00022A: 


3E3C 


008A 




MOVE.W 


#$008A,D7 


00022E: 


4E45 






TRAP 


#$5 


000230: 


2E1F 






lOVE.L 


(A7)+,D7 


000232: 


4CDF 


0300 




MOVEM.L 


(A7)+,A0/A1 


000236: 


3281 






MOVE.W 


D1, (A1) 


000238: 


225F 






MOVE.L 


(A7)+,A1 


00023A: 


3280 






MOVE.W 


D0,(A1) 


00023C: 


4ED0 






JMP 


(AO) 


00023E: 


2F07 




SCREENAD 


MOVE. L 


D7, -(A7) 


000240: 


3EX 


0018 




MOVE. ID 


#$0018, D7 


000244: 


4E45 






TRAP 


#$5 


000246: 


2E1F 






MOVE.L 


(A7)+,D7 


000248: 


2F48 


0004 




MOVE.L 


AO, $0004(A7) 


00Q24C: 


4E75 






RTS 




00024E: 


2F07 




ALTSCREE 


MOVE.L 


07, -(A7) 


000250: 


3E3C 001A 




MOVE.W 


#$001 A, D7 


000254: 


4E45 






TRAP 


#$5 


000256: 


2E1F 






MOVE.L 


(A7)+,D7 


000258: 


2F48 0004 




MOVE.L 


A0,$0QO4(A7) 


00025C: 


^75 






RTS 




00025E: 


2F07 




SCREENKE 


MOVE.L 


D7,-(A7) 


000260: 


3E3C 


008E 




MOVE.W 


^«5008E,D7 


000264: 


4E45 






TRAP 


#$5 


000266: 


2E1F 






MOVE.L 


(A7)+,D7 


000268: 


1F40 


0004 




MOVE.B 


D0,$0004(A7) 


00026C: 


4E75 






RTS 




00026E: 


205F 




SETSCREE 


MOVE.L 


(A7)+,A0 


000270: 


101F 






MOVE.B 


(A7)+, DO 


000272: 


2F07 






MOVE.L 


D7, -(A7) 


000274: 


3E3C 


0090 




MOVE.W 


#$0090, D7 


000278: 


4E45 






TRAP 
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# Apple 


Lisa Computer: 


Hardware Unit Disassembly ] 




Lisa Hardware Interface & Implementation 


00027A: 


2E1F 




MOVE. L 


(A7)+,D7 


00027C: 


4ED0 




JttP 


(AO) 


00027E: 


2F07 


CONTRAST 


MOVE.L 


D7,-(A7) 


000280: 


3E3C 001C 




HOUE.W 


#$001C, D7 


000284: 


4E45 




TRAP 


#$5 


000286: 


2E1F 




MOVE.L 


(A7)+,D7 


000288: 


3F40 0004 




MOVE.W 


DO, $0004(A7) 


Q0028C: 


4E75 




RTS 




00028E: 


205F 


SETCONTR 


MOVE.L 


(A7)+,A0 


000290: 


301F 




MOVE.W 


(A7)+,D0 


000292: 


2F07 




MOVE.L 


D7, -(A7) 


000294: 


3E3C 001 E 




MOVE.W 


#$001E,D7 


000298: 


4E45 




TRAP 


#$5 


00029A: 


2E1F 




MOVE.L 


(A7)+,D7 


00029C: 


4ED0 




JMP 


(AO) 


00029E: 


205F 


RAMPCONT 


MOVE.L 


(A7)+,A0 


0002AO: 


301F 




MOVE.W 


(A7>+,D0 


0002A2: 


2F07 




MOVE.L 


D7, -(A7) 


0002A4: 


SEX 0020 




MOVE. W 


#$0020, D7 


0002A8: 


4E45 




TRAP 


«$5 


0002AA: 


2E1F 




MOVE.L 


(A7)+,D7 


0002AC: 


4ED0 




JHP 


(AO) 


0002AE: 


2F07 


DIMCONTR 


MOVE.L 


07, -(A7) 


0002B0: 


3E3C 0082 




MOVE.W 


#$0082, D7 


000284: 


4E45 




TRAP 


#$5 


0002B6: 


2E1F 




MOVE.L 


(A7)+,D7 


0002B8: 


3F40 0004 




MOVE.W 


DO, $0004(A7) 


0002BC: 


4E75 




RTS 




0002BE: 


205F 


SETDIhCO 


MOVE.L 


(A7)+,A0 


0002C0: 


301F 




MOVE.W 


(A7)+,D0 


0002C2: 


2F07 




MOVE.L 


D7,-(A7) 


0002C4: 


3E3C 0084 




MOVE.W 


#$0084, D7 


0002C8: 


4E45 




TRAP 


#$5 


0002CA: 


2E1F 




MOVE.L 


(A7)+,D7 


00G2CC: 


4ED0 




JMP 


(AO) 


0002CE: 


2F07 


FADEDELA 


MOVE.L 


D7,-(A7) 


0002D0: 


3E3C 0022 




HOVE. W 


#$0022, D7 


0002D4: 


4E45 




TRAP 


#$5 


0002D6: 


2E1F 




MOVE.L 


(A7)+,D7 


0002D8: 


2F40 0004 




MOVE.L 


D0,$0004(A7) 


0002DC: 


4E75 




RTS 




0002DE: 


205F 


SETFADED 


MOVE.L 


(A7)+,A0 


0002E0: 


201F 




MOVE.L 


(A7)+,D0 


0002E2: 


2F07 




MOVE.L 


D7, -(A7) 


0002E4: 


3E3C 0024 




MOVE.W 


#$0024,07 


0002E8: 


4E45 
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# Apple 


Lisa Computer: 


Hardware Unit Disassembly ] 




Lisa Hardware Interface & Implementation 


00D2EA: 


2E1F 




MOVE. L 


(A7)+.D7 


0002EC: 


4ED0 




JMP 


(fto) 


0002EE: 


2F07 


POWERDOW 


MOVE.L 


D7, -(A7) 


0002FO: 


3E3C 0026 




MOVE. U 


#$0026, 07 


0002F4: 


4E45 




TRAP 


#$5 


0002F5: 


2E1F 




MOVE.L 


(A7)+,D7 


0002F8: 


4E75 




RTS 




0002FA: 


205F 


POiDERCYC 


MOVE.L 


(A7)+,A0 


0002FC: 


201F 




MOVE.L 


(A7)+,D0 


0002FE: 


2F07 




MOVE.L 


07, -(A7) 


000300: 


3EX 0028 




MOVE.III 


#$0028, 07 


000304: 


4E45 




TRAP 


#$5 


000306: 


2E1F 




MOVE.L 


(A7)+,D7 


000308: 


4ED0 




JMP 


<A0) 


00030A: 


2F07 


VOLUME 


MOVE.L 


07, -(A7) 


00030C: 


3EX 002A 




MOVE.W 


#$002A, 07 


000310: 


4E45 




TRAP 


#$5 


000312: 


2E1F 




MOVE.L 


(A7)+,D7 


000314: 


3F40 0004 




MOVE.W 


DO, $0004 (A7) 


000318: 


4E75 




RTS 




00031A: 


205F 


SETVOLUM 


MOVE.L 


(A7)+,A0 


00031C: 


301F 




MOVE. W 


(A7)+,D0 


00031E: 


2F07 




MOVE.L 


07, -(A7) 


000320: 


3E3C 002C 




MOVE. W 


#$0020, 07 


000324: 


4E45 




TRAP 


#$5 


000326: 


2E1F 




MOVE.L 


(A7)+, 07 


000328: 


4ED0 




JMP 


<A0) 


O0U32A: 


205F 


NOISE 


MOVE.L 


(A7)+,A0 


00032C: 


201F 




MOVE.L 


(A7)+,D0 


00032E: 


2F07 




MOVE.L 


07, -(A7) 


000330: 


3E3C 002E 




MOVE.* 


#$002E,D7 


oon:^34: 


4E45 




TRAP 


#$5 


000336: 


2E1F 




MOVE. L 


(A7)+,D7 


000338: 


4ED0 




JMP 


(AO) 


00033A: 


2F07 


SILENCE 


MOVE. L 


07, -(A7) 


00033C: 


3E3C 0030 




MOVE.* 


#$0030,07 


000340: 


4E45 




TRAP 


#$5 


000342: 


2E1F 




MOVE.L 


(A7)+,D7 


000344: 


4E75 




RTS 




000346: 


205F 


BEEP 


MOVE.L 


(A7)+,A0 


000348: 


221F 




MOVE.L 


(A7)+,D1 


00034A: 


201F 




MOVE.L 


(A7)+,D0 


00034C: 


2F07 




MOVE.L 


07, -(A7) 


00034E: 


3E3C 0032 




MOVE.III 


#$0032,07 


000352: 


4E45 




TRAP 


#$5 


000354: 


2E1F 




MOVE.L 
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# Apple 


Lisa Computer: 


Hardware Unit Disassembly ] 




Lisa Hardware Interface & Implementation 


000356 


4ED0 






JMP 


(AO) 


000358 


2F07 




KEYBOARD 


MQVE.L 


07. -(A7) 


00035A 


3E3C 


0038 




MOVE.W 


#$0038, D7 


00035E 


4E45 






TRAP 


#$5 


000360 


2E1F 






MOVE.L 


(A7)+,D7 


000362 


3F40 


0004 




MOVE. Ill 


DO. $0004(A7) 


000366 


4E75 






RTS 




000368 


2F07 




LEGENDS 


MOVE.L 


D7. -(A7) 


00036A 


3E3C 0096 




MOVE. II 


#$0096, D7 


0003fiF 


4E45 






TRAP 


#$5 


000370 


2E1F 






MOVE.L 


(A7)+,D7 


000372 


3F40 


0004 




MOVE.W 


DO. $00G4(A7) 


000376 


4E75 






RTS 




000378 


205F 




SETLEGEN 


MOVE.L 


(A7)+.A0 


00037A 


301F 






MOVE.W 


(A7)+.D0 


00037C 


2F07 






MOVE.L 


D7. -(A7) 


00037E 


3E3C 0098 




MOVE.W 


#$0098, D7 


000382 


4E45 






TRAP 


#$5 


000384 


2E1F 






MOVE.L 


(A7)+, D7 


000386 


4ED0 






J1P 


(AO) 


000388 


205F 




KEYISDOW 


MOVE.L 


(A7)+, AO 


00038A 


4240 






CLR.W 


DO 


00038C 


101F 






MOVE.B 


(A7)+.D0 


00038E 


2F07 






MOVE.L 


D7. -(A7) 


000390 


3E3C 


0034 




MOVE.W 


<f$0034,D7 


000394 


4E45 






TRAP 


#$5 


000396 


2E1F 






MOVE.L 


(A7)+.D7 


000398 


1E81 






MOVE.B 


D1. (A7) 


00039A 


4ED0 






JMP 


(AO) 


00039C 


4CDF 


0300 


KEYMAP 


MOVEM.L 


(A7)+.A0/A1 


0003A0 


2F03 






MOVE.L 


D3, -(A7) 


0003A2 


2F07 






MOVE.L 


D7, -(A7) 


0003A4 


3E3C 


0036 




MOVE.W 


#$0036, D7 


0003A8 


4E45 






TRAP 


#$5 


0003AA 


2E1F 






MOVE.L 


(A7)^D7 


0003AC 


22C3 






MOVE.L 


D3, (A1) + 


0003AE 


22C2 






MOVE.L 


D2, (A1)+ 


0003B0 


22C1 






MOVE.L 


D1,(A1) + 


0003B2 


22C0 






MOVE.L 


DO. (A1) + 


0003B4 


261 F 






MOVE.L 


(A7)+.D3 


0003B6 


4ED0 






JMP 


(AO) 


0003B8 


4CDF 


0300 


KEYBDPEE 


MOVEM. L 


(A7)+.A0/A1 


0003BC 


321 F 






MOVE.W 


(A7)+,D1 


0003BE 


101F 






MOVE.B 


(A7)+.D0 


0003C0 


48E7 


1E00 




MOVEM. L 


D3-D6, -(A7) 


0003C4 


2F07 






MOVE.L 


D7, -(A7) 


0003C6 


3E3C 


003C 




MOVE.W 
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# Apple 


Lisa Computer: 


Hardware Unit Disassembly ] 




Lisa Hardware Interface & Implementation 


0003CA: 


4E45 






TRAP 


#$5 


0G03CC: 


2E1F 






MOVE.L 


(A7)+,D7 


oonanF: 


6016 






BRA.S 


•+$0018 ; 000003E6 


OOU-JUO: 


4CDF 


0300 


ALTKEYPE 


MOVEM.L 


(A7)+, A0/A1 


0003D4: 


321F 






MOVE.W 


(A7)+, D1 


0003D6: 


101F 






MOVE.B 


(A7)+,D0 


0003D8: 


48E7 


1E00 




MOVEM.L 


D3-D6,-(A7) 


0003DC: 


2F07 






MOVE.L 


D7,-(A7) 


0003DE: 


3E3C 


0092 




MOVE. W 


#$0092, D7 


0003E2: 


4E45 






TRAP 


#$S 


0003E4: 


2E1F 






MOVE.L 


(A7)+,D7 


00n3F6: 


12C1 






MOVE.B 


D1,(A1) + 


0003E8: 


12C2 






MOVE.B 


D2, (A1) + 


OOfWFA: 


32C3 






MOVE.W 


D3,(A1) + 


0003tC: 


32C4 






MOVE.W 


D4,(A1) + 


0003EE: 


32C5 






MOVE.W 


D5,(A1) + 


0003FO: 


22C6 






MOVE.L 


D6,(A1) + 


0003F2: 


4CDF 


0078 




MOVEM.L 


(A7)+,D3-D6 


0003F6: 


1E80 






MOVE.B 


DO, (A7) 


0003F8: 


4ED0 






JMP 


(AO) 


0003FA: 


4CDF 


0300 


KEVBDEVE 


MQVEM. L 


(A7)+,A0/A1 


0003FE: 


121F 






mVE.B 


(A7)+,D1 


000400: 


101F 






MOVE.B 


(A7)+,D0 


000402: 


48E7 


1E00 




MOVEM.L 


D3-D6, -(A7) 


000406: 


2F07 






mVE.L 


D7,-(A7) 


000408: 


3E3C 


003A 




MOVE.W 


#$003A, D7 


00040C: 


4E45 






TRAP 


*ft55 


00040E: 


2E1F 






MOVE.L 


(A7)+,D7 


000410: 


6016 






BRA.S 


•+$0018 ; 00000428 


000412: 


4CDF 


0300 


ALTKEVEV 


MOVEM.L 


(A7)+,A0/A1 


000416: 


121F 






MOVE.B 


(A7)+,D1 


000418: 


101F 






MOVE.B 


(A7)+,D0 


00041A: 


48E7 


1E00 




MOVEM. L 


D3-D6, -(A7) 


00041E: 


2F07 






MOVE.L 


D7, -(A7) 


000420: 


3E3C 


0094 




MOVE.W 


ff$0094, D7 


000424: 


4E45 






TRAP 


#$5 


000426: 


2E1F 






MOVE.L 


(A7)+,D7 


000428: 


12C1 






MOVE. B 


D1,(A1)+ 


00042A: 


12C2 






MOVE.B 


D2,(A1) + 


00042C: 


32C3 






MOVE.W 


D3,(A1)+ 


00042E: 


32C4 






MOVE.W 


D4,(A1) + 


000430: 


32C5 






MOVE.W 


D5,(A1) + 


000432: 


22C6 






MOVE.L 


D6,(A1) + 


000434: 


4CDF 0078 




MOVEM.L 


(A7)+,D3-D6 


000438: 


1E80 






MOVE.B 


DO, (A7) 


00043A: 


4ED0 






JMP 


(AO) 


D0043G: 


2FD7 




REreATRA 


MOVE.L 


D7, -(A7) 


00043E: 


3E3C 003E 




MOVE. W 


#$003E, D7 


000442: 


4E45 






TRAP 
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# Apple 


Lisa Computer: 


Hardware Unit Disassembly ] 




Lisa Hardware lr)terface & Implementation 


000444: 


2E1F 




mvE.L 


(A7)+, 07 


000446: 


4CDF 0300 




mvEM.L 


(A7)+,A0/A1 


00044A: 


2281 




MOVE.L 


D1,(A1) 


00044C: 


225F 




MOVE.L 


(A7)+,A1 


00044E: 


2280 




mVE.L 


D0,(A1) 


000450: 


4ED0 




JMP 


(AO) 


000452: 


205F 


SETREPEA 


HOVE.L 


(A7)+,A0 


000454: 


221 F 




MOVE.L 


(A7)+. D1 


000456: 


201F 




MOVE.L 


(A7)t.D0 


000458: 


2F07 




MOVE.L 


D7, -(A7) 


00045A: 


3E3C 0040 




MOVE.« 


#$004a 07 


00045E: 


4E45 




TRAP 


#$5 


000460: 


2E1F 




HOVE.L 


(A7)^D7 


000462: 


4ED0 




JMP 


(AD) 


000464: 


205F 


KEYPUSt€ 


MOVE. L 


(A7)+,A0 


000466: 


4240 




CLR.W 


DO 


000468: 


101F 




MOVE.B 


(A7)+,D0 


00046A: 


2F07 




MOVE.L 


D7, -(A7> 


00046C: 


3E3C 0042 




MOVE. W 


#$0042, D7 


000470: 


4E45 




TRAP 


<^ 


000472: 


2E1F 




MOVE.L 


(A7)+,D7 


000474: 


4ED0 




JMP 


(AO) 


000476: 


2F07 


NMIKEY 


MOVE.L 


07. -(A7) 


000478: 


3F3C 0072 




MOVE. lU 


*«0072,D7 


00047C: 


4E45 




TRAP 


#$5 


00047E: 


2E1F 




MOVE.L 


(A7)+,D7 


000480: 


1F40 0004 




MOVE.B 


DO, $0004 (A7) 


000484: 


4E75 




RTS 




000486: 


205F 


SETNMIKE 


MOVE.L 


(A7)+,A0 


000488: 


4240 




CLR.W 


DO 


00048A: 


101F 




MOVE.B 


(A7)+,D0 


00048C: 


2F07 




MOVE.L 


D7, -(A7) 


00048E: 


3E3C 0074 




MOVE.W 


#$0074, D7 


000492: 


4E45 




TRAP 


#$5 


000494: 


2E1F 




MOVE. L 


(A7)+,D7 


000496: 


4ED0 




JMP 


(AO) 


000498: 


2F07 


TOGGLEKE 


MOVE.L 


D7, -(A7) 


00049A: 


3E3C OOAO 




MOVE.W 


#$00A0, D7 


0004gE: 


4E45 




TRAP 


#$5 


0004A0: 


2E1F 




MOVE.L 


(A7)+,D7 


0004A2: 


1F40 0004 




MOVE.B 


DO. $0004(A7) 


0004A6: 


4E75 




RTS 




0004AB: 


205F 


SETTOGGL 


MOVE.L 


(A7)+,A0 


0004AA: 


4240 




CLR.II) 


DO 


0004AC: 


101F 




MOVE.B 


(A7)+,D0 


0004AE: 


2F07 




MOVE.L 


D7, -(A7) 


0004B0: 


3E3C 00A2 




MOVE.W 
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Lisa Hardware Interface & Implementation 


0004B4: 


4E45 




TRAP 


#$5 


0004B6: 


2E1F 




MOVE. L 


(A7)+,D7 


0004B8: 


4ED0 




JMP 


(AO) 


0004BA: 


2F07 


HICROTIli 


MOUE.L 


D7,-(A7) 


00046C: 


3E3C 009A 




MOVE.W 


#$009A,D7 


0004C0: 


4E45 




TRAP 


#$5 


0004C2: 


2E1F 




MOVE.L 


(A7)^D7 


0004C4: 


2F40 0004 




MOVE.L 


DO, $0004(A7) 


0004C8: 


4E75 




RTS 




0004CA: 


2F07 


TIMER 


MOVE.L 


D7, -(A7) 


0004CC: 


3E3C 0044 




MOVE. m 


*i$0044, D7 


0004D0: 


4E45 




TRAP 


m^ 


0004D2: 


2E1F 




MOVE.L 


(A7)+,D7 


0004D4: 


2F40 0004 




MOVE.L 


DO, $0004(A7) 


0004D8: 


4E75 




RTS 




0004DA: 


206F 0004 


ALARMASS 


MOVE. L 


$0004(A7), AO 


0004DE: 


2F07 




MOVE.L 


D7, -(A7) 


0004E0: 


3E3C 0046 




MOVE. Ill 


#$0046, D7 


0004E4: 


4E45 




TRAP 


#$5 


0004E6: 


2E1F 




MOVE.L 


(A7)+,D7 


0004E8: 


205F 




MOVE.L 


(A7)+,A0 


0004EA: 


584F 




ADDQ. Ill 


*m,A7 


0004EC: 


225F 




MOVE.L 


(A7)+,A1 


0004EE: 


3280 




MOVE.W 


DO, (A1) 


0004F0: 


4ED0 




JMP 


(AO) 


0004F2: 


205F 


ALARMRET 


MOVE.L 


(A7)+,A0 


0004F4: 


301F 




MOVE.W 


(A7)+,D0 


0004F6: 


2F07 




MOVE.L 


D7,-(A7) 


0004F8: 


3E3C 0048 




MOVE. W 


^f$0048,D7 


0004FC: 


4E45 




TRAP 


i^i 


0004FE: 


2E1F 




MOVE.L 


(A7)+,D7 


000500: 


4ED0 




JMP 


(AO) 


000502: 


205F 


ALARMABS 


MOVE. L 


(A7)+,A0 


000504: 


221 F 




MOVE.L 


(A7)+,D1 


000508: 


301F 




MOVE. Ill 


(A7)+,D0 


000508: 


2F07 




MOVE.L 


D7, -(A7) 


00050A: 


3E3C 004A 




MOVE. Ill 


<«f004A,D7 


00050E: 


4E45 




TRAP 


«$5 


000510: 


2E1F 




MOVE. L 


(A7)+,D7 


000512: 


4ED0 




JMP 


(AO) 


000514: 


205F 


ALARMREL 


MOVE. L 


(A7)+,A0 


000516: 


221 F 




MOVE.L 


(A7)+,D1 


000518: 


301F 




MOVE.W 


(A7)+,D0 


00051 A: 


2F07 




MOVE.L 


07, -(A7) 


00051 C: 


3E3C 004C 




MOVE.W 


#$004C, D7 


000520: 


4E45 




TRAP 


#$5 


000522: 


2E1F 




MOVE. L 
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000524: 


4ED0 






JMP 


(AO) 


000526: 


205F 




ALARMOFF 


MOVE.L 


(A7)+ AO 


000528: 
00052A: 


301F 
2F07 






HOVE.W 
MOVE. L 


(A7)+,D0 
D7, -(A7) 
#$004E,D7 
#$5 


00052C: 
000530: 


3E3C 004E 
4E45 




riOVE.« 
TRAP 


000532: 


2E1F 






MOVE.L 


(A7)+,D7 


000534: 


4ED0 






JMP 




000536: 


4CDF 0300 


DATETIME 


MOVEM.L 


(A7)+,A0/A1 


00053A: 
00n53F: 


48E7 
2F07 


1800 




MOVEM.L 
MOVE.L 


D3/D4, -<A7) 
07, -(A7) 


000540: 


3E3C 0050 




MOVE.W 


#$0050, 07 


000544: 


4E45 






TRAP 


«$5 


000546: 


2E1F 






MOVE.L 


(A7)+.D7 


000548: 
00054A: 


32C0 
32C1 






MOVE.W 
HOVE.W 


Da(A1)+ 
D1, (A1)+ 


00054C: 
00054E: 


32C2 
32C3 






MOVE.m 
MOVE.W 


D2,(A1)+ 
D3,(A1)+ 


000550: 


32C4 






MOVE.W 


04, (A1)+ 


000552: 


4CDF 


0018 




MOVEM. L 


(A7)+,D3/D4 


000556: 


4ED0 






JMP 


(AO) 


000558: 


4CDF 


0300 


SETDAIhl 


MOVEM.L 


(A7)+,A0/A1 


00055C: 


48E7 


1800 




MOVEM. L 


D3/D4. -(A7) 


000560: 


3019 






MOVE.W 


(A1)+,D0 


000562: 


3219 






MOVE.W 


(A1)+,D1 


000564: 


3419 






MOVE. W 


(A1)+,D2 


000566: 


3619 






MOVE.W 


(A1)+,D3 


000558: 


3819 






MOVE.W 


(A1)+,D4 


00056A: 


2F07 






MOVE.L 


07, -(A7) 


00Q55C: 


3EX 


0052 




MOVE.W 


**$0052, 07 


000570: 


4E45 






TRAP 


#$5 


000572: 


2E1F 






MOVE.L 


(A7)+,D7 


000574: 


4CDF 


0018 




MOVEM.L 


(A7)+,D3/D4 


000578: 


4ED0 






JMP 


(AD) 


00057A: 


226F 


0008 


DATETOTI 


MOVE.L 


$0008(A7),A1 


00057E: 


48E7 


1800 




MOVEM.L 


D3/D4, -(A7) 


000582: 


3019 






MOVE.W 


(A1)+,D0 


000584: 


3219 






mVE.W 


(A1)+,D1 


000586: 


3419 






HOVE.W 


(A1)+,D2 


000588: 


3619 






MOVE.W 


(A1)^03 


00058A: 


3819 






MOVE.W 


(A1)+,D4 


00058C: 


2F07 






HOVE.L 


07. -(A7) 


00058E: 


3E3C 0054 




MOVE.W 


#$0054,07 


000592: 


4E45 






TRAP 


#$5 


000594: 


2E1F 






MOVE.L 


(A7)+,D7 


000596: 


4CDF 


0018 




MOVEM.L 


(A7)+,D3/D4 


00059A: 


4CDF 


0300 




MOVEM.L 


(A7)+,A0/A1 


00059E: 


2280 






MOVE.L 


D0,(A1) 


0005A0: 


584F 






ADDQ.W 
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0005A2: 


4ED0 




JMP 


(AO) 


0005A4: 


2F07 


TlhESTAH 


MOVE. L 


D7, -(A7) 


0005A6: 


3EX 0058 




MOVE. W 


#$0058, 07 


0005AA: 


4E45 




TRAP 


«$5 


OdOSAC: 


2E1F 




MOVE.L 


(A7)+,D7 


0005AE: 
0005B2: 


2F40 0004 
4E75 




MOVE.L 
RTS 


Da $0004(A7) 


0005B4: 


205F 


SEHIIiES 


MOVE.L 


{A7)+,A0 


0005B6: 


201F 




MOVE.L 


(A7)+,D0 


0005B8: 


2F07 




MOVE.L 


07, -(A7) 


0005BA: 


3E3C 005A 




MOVE. % 


n005A,D7 


0005BE: 


4E45 




TRAP 


#$5 


0005C0: 
0005C2: 


2E1F 
4ED0 




MOVE.L 
JMP 


(A7)+,D7 
(AO) 


0005C4: 


4CDF 0300 


TIHETODA 


MOVEM. L 


(A7)+,A0/A1 


0005C8: 


201F 




MOVE.L 


(A7)+, DO 


0005CA: 


48E7 1800 




MOVEM. L 


D3/D4, -(A7) 


OOnSHE: 


2F07 




MOVE.L 


D7, -(A7) 


0005D0: 


3E3C 005C 




MOVE. Ill 


#$nn5n,D7 


0005D4: 


4E45 




TRAP 


#$5 


0005D6: 


2E1F 




MOVE.L 


(A7)+,D7 


onnsriR: 


32C0 




MOVE. tU 


D0,(A1)+ 


0005DA: 


32C1 




MOVE. tU 


D1, (A1)+ 


0005DC: 


32C2 




MOVE.W 


D2,(A1)+ 


0005DE: 


32C3 




MOVE.W 


03, (A1)+ 


0005E0: 


32C4 




MOVE.W 


D4,(A1)+ 


0005E2: 


4CDF 0018 




MOVEM. L 


(A7)+,D3/D4 


0005E6: 


4ED0 




JMP 


(AO) 


0005E8: 


4E5E 




UNLK 


A6 








Finis 
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